Sistema de Estadísticas Oficiales de la UNAL


Alberto Rodríguez Rodríguez
albrodriguezr@unal.edu.co
https://albertor.netlify.app/

Dirección Nacional de Planeación y Estadística
Universidad Nacional de Colombia

QR de la presentación


¿Qué es el Sistema de Estadísticas Oficiales de la UNAL?


El Sistema de Estadísticas Oficiales de la UNAL está conformado por los instrumentos y las herramientas orientadas a la gestión y disposición de las cifras estadísticas oficiales, así como al uso y extracción del valor contenido en los datos institucionales.

Modelo Gestión Estadística P2C-T

Planeación Estadística (P)

Plan Estadístico Institucional


Líneas Estratégicas del Plan
  • Líneamientos conceptuales
  • Producción estadística
  • Herramientas tecnológicas
  • Cultura estadística


Duración del Plan

Se desarrollará en 3 planes rectorales (9 años). A la fecha, se ha avanzado en un 60 %.

Conceptualización (C)

Documentos Conceptuales

Aportes conceptuales de la Universidad Nacional de Colombia parala gestión y disposición de estadísticas e indicadores en el contexto público.

Producción Estadística (P)

Página de Estadísticas de la UNAL

Estadísticas Oficiales Disponibles

Aspirantes, admitidos, matriculados, graduados, docentes, personal administrativo, así como enlaces a información oficial de investigación, extensión e innovación e información financiera.


Mecanismos de difusión
  • Dashboards.
  • Boletines web estadísticos.

Herramientas Tecnológicas (T)

El software R, protagonista en la gestión estadística en la UNAL

El Paquete de R UnalR

El paquete UnalR proporciona métodos y herramientas para la visualización de estadísticas.


Aporte Central


Conjunto de funciones orientadas a la visualización estática e interactiva haciendo uso de funciones únicas derivadas de los paquetes highcharter, plotly, leaflet, DT, gt y ggplot2, principalmente.

Ejemplos Uso Paquete Unal R

Ver código
# Librerías requeridas

library(tidyverse)
library(UnalData)
library(UnalR)

Agregar(TIPO_NIVEL ~ YEAR + SEMESTRE, 
        frecuencia = list(c(2009:2023), c(1:2)),
        intervalo = list(c(2009, 1), c(2023, 1)),
        datos = UnalData::Matriculados,
        textNA = "Sin información") %>% 
   Plot.Series(categoria = "TIPO_NIVEL", 
              colores = c("#8cc63f", "#CC241D"), 
              titulo = "Evolución histórica del número total de matriculados", 
              labelY = "Número de matriculados",
              ylim = c(0,NaN),
              libreria = c("highcharter"), 
              estilo = list(hc.Tema = 1, hc.Slider = FALSE, hc.Credits = "DNPE")) 
Ver código
# Librerías requeridas

library(tidyverse)
library(UnalData)
library(UnalR)

Agregar(TIPO_NIVEL ~ YEAR + SEMESTRE, 
        frecuencia = list(c(2009:2023), c(1:2)),
        intervalo = list(c(2009, 1), c(2023, 1)),
        datos = UnalData::Matriculados,
        textNA = "Sin información") %>% 
   Plot.Series(categoria = "TIPO_NIVEL", 
              colores = c("#8cc63f", "#CC241D"), 
              titulo = "Evolución histórica del número total de matriculados", 
              labelY = "Número de matriculados",
              ylim = c(0,NaN),
              libreria = c("plotly"), 
              estilo = list(hc.Tema = 1, hc.Slider = FALSE, hc.Credits = "DNPE")) 
Ver código
# Librerías requeridas

library(tidyverse)
library(UnalData)
library(UnalR)

Agregar(TIPO_NIVEL ~ YEAR + SEMESTRE, 
        frecuencia = list(c(2009:2023), c(1:2)),
        intervalo = list(c(2009, 1), c(2023, 1)),
        datos = UnalData::Matriculados,
        textNA = "Sin información") %>% 
   Plot.Series(categoria = "TIPO_NIVEL", 
              colores = c("#8cc63f", "#CC241D"), 
              titulo = "Evolución histórica del número total de matriculados",
              labelY = "Número de matriculados\n",
              estatico = TRUE,
              ylim = c(0,NaN),
              estilo       = list(
              LegendTitle = "Nivel", gg.Tema = 5,
               gg.Legend = list(legend.position = "bottom", legend.direction = "horizontal"),
               gg.Repel  = list(overlapping = TRUE, size = 3)
              ) )

Ver código
# Librerías requeridas

library(tidyverse)
library(UnalData)
library(UnalR)

Plot.Mapa(
  datos = Saber_Unal,
  depto = COD_DEP_PROC,
  mpio = COD_CIU_PROC,
  variable = Cuantitativo,
  estadistico = c("Promedio"),
  agregado = TRUE,
  tipo     = "Mpios",
  titulo = "Promedio <br>Cuantitativo",
  naTo0    = FALSE,
  cortes        = c(0, 160, 170, 180, Inf),  
  colores       = c("red", "#fc9272", "#31a354", "#10F235"),
  estatico = FALSE)
Ver código
# Librerías requeridas

library(tidyverse)
library(UnalData)
library(UnalR)

Plot.Mapa(
  datos = Saber_Unal,
  depto = COD_DEP_PROC,
  mpio = COD_CIU_PROC,
  variable = Escrita,
  estadistico = c("Promedio"),
  agregado = TRUE,
  tipo     = "Mpios",
  titulo = "Promedio <br> C. Escrita",
  naTo0    = FALSE,
  cortes        = c(0, 160, 170, 180, Inf),  
  colores       = c("red", "#fc9272", "#31a354", "#10F235"),
  estatico = FALSE)
Ver código
# Librerías requeridas

library(tidyverse)
library(UnalData)
library(UnalR)

Plot.Mapa(
  datos = Saber_Unal,
  depto = COD_DEP_PROC,
  mpio = COD_CIU_PROC,
  variable = Escrita,
  estadistico = c("Promedio"),
  agregado = TRUE,
  tipo     = "Mpios",
  titulo   = "Resultados Prom. Comun. Escrita \nPrueba Saber Pro UNAL por Municipios",
  naTo0    = FALSE,
  cortes        = c(0, 160, 170, 180, Inf),  
  colores       = c("red", "#fc9272", "#31a354", "#10F235"),
  estatico = TRUE,
  estilo   = list(
    Style = "Intervalo",  Theme = 5, anchoBorde = 0.2,
    labelX = "", 
    labelY = "",
    Legend = list(legend.position = "bottom", legend.direction = "horizontal"),
    Labs  = list(fill = "Puntaje Comunicación Escrita Prueba SaberPro", subtitle = "Periodo 2016-2021"),
    Text  = list(color = "gray", size = 0)
  ))

Ver código
# Librerías requeridas

library(tidyverse)
library(UnalData)
library(UnalR)
library(DT)

Tabla(datos = iris,
      estatico = FALSE,
      scrollX = FALSE)
Ver código
# Librerías requeridas

library(tidyverse)
library(UnalR)
library(gt)

Tabla(datos = head(iris),
      estatico = TRUE)
Sepal.Length Sepal.Width Petal.Length Petal.Width Species
5.1 3.5 1.4 0.2 setosa
4.9 3 1.4 0.2 setosa
4.7 3.2 1.3 0.2 setosa
4.6 3.1 1.5 0.2 setosa
5 3.6 1.4 0.2 setosa
5.4 3.9 1.7 0.4 setosa

Cultura Estadística (C)

Acciones para fomentar la cultura estadística

  • Socialización al interior de las entidades
  • Implementación de campañas en redes sociales
  • Construcción y disposición de videos
  • Disposición de Souvenirs
  • Participación en eventos nacionales e internacionales

Información de Contacto



Oficina Nacional de Estadística - UNAL

Dirección Nacional de Planeación y Estadística

Mail: estadistica_nal@unal.edu.co

Telefóno: (+57 1) 316 5000 ext: 18519

Ubicación: Carrera 45 # 26-58, oficina 506

Edif. Uriel Gutiérrez

Bogotá D.C., Colombia